home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #14
/
Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO
/
prog_bas
/
pclvbw10.zip
/
SIMPGLOB.BAS
< prev
next >
Wrap
BASIC Source File
|
1996-02-09
|
702b
|
26 lines
' Global Variables
Option Explicit
Global ThePort As Integer
Global TheBaudCode As Integer
Global TheDataBits As Integer
Global TheParity As Integer
Global TheStopBits As Integer
Global BaudText(0 To 9) As String
Global ParityText(0 To 7) As String
Global OnLineFlag As Integer
Global RxSelector As Integer
Global TxSelector As Integer
Global LockCount As Integer
Global FatalFlag As Integer
Global ScreenBuffer(0 To 23) As String * 80
Global CurrentRow As Integer
Global CurrentCol As Integer
Global ParityControl As Control
'Global constants
Global Const COM_PORTS = 1
Global Const BAUD_RATE = 2
Global Const DATA_BITS = 3
Global Const STOP_BITS = 4
Global Const PARITY = 5